home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 April: Mac OS SDK / Dev.CD Apr 99 SDK1.toast / Development Kits / Interfaces&Libraries / Universal / Interfaces / AIncludes / Sound.a < prev    next >
Encoding:
Text File  |  1998-08-17  |  75.1 KB  |  2,270 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Sound.a
  3. ;
  4. ;    Contains:    Sound Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    Sound Manager 3.3
  7. ;                Release:    Universal Interfaces 3.2
  8. ;
  9. ;    Copyright:    © 1986-1998 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        For bug reports, consult the following page on
  12. ;                the World Wide Web:
  13. ;
  14. ;                    http://developer.apple.com/bugreporter/
  15. ;
  16. ;
  17.     IF &TYPE('__SOUND__') = 'UNDEFINED' THEN
  18. __SOUND__ SET 1
  19.  
  20.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  21.     include 'MacTypes.a'
  22.     ENDIF
  23.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  24.     include 'Dialogs.a'
  25.     ENDIF
  26.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  27.     include 'Components.a'
  28.     ENDIF
  29.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  30.     include 'MixedMode.a'
  31.     ENDIF
  32.     IF &TYPE('__MOVIES__') = 'UNDEFINED' THEN
  33.     include 'Movies.a'
  34.     ENDIF
  35.  
  36. ; 
  37. ;                        * * *  N O T E  * * *
  38. ;
  39. ;    This file has been updated to include Sound Manager 3.3 interfaces.
  40. ;
  41. ;    Some of the Sound Manager 3.0 interfaces were not put into the InterfaceLib
  42. ;    that originally shipped with the PowerMacs. These missing functions and the
  43. ;    new 3.3 interfaces have been released in the SoundLib library for PowerPC
  44. ;    developers to link with. The runtime library for these functions are
  45. ;    installed by the Sound Manager. The following functions are found in SoundLib.
  46. ;
  47. ;        GetCompressionInfo(), GetSoundPreference(), SetSoundPreference(),
  48. ;        UnsignedFixedMulDiv(), SndGetInfo(), SndSetInfo(), GetSoundOutputInfo(),
  49. ;        SetSoundOutputInfo(), GetCompressionName(), SoundConverterOpen(),
  50. ;        SoundConverterClose(), SoundConverterGetBufferSizes(), SoundConverterBeginConversion(),
  51. ;        SoundConverterConvertBuffer(), SoundConverterEndConversion(),
  52. ;        AudioGetBass(), AudioGetInfo(), AudioGetMute(), AudioGetOutputDevice(),
  53. ;        AudioGetTreble(), AudioGetVolume(), AudioMuteOnEvent(), AudioSetBass(),
  54. ;        AudioSetMute(), AudioSetToDefaults(), AudioSetTreble(), AudioSetVolume(),
  55. ;        OpenMixerSoundComponent(), CloseMixerSoundComponent(), SoundComponentAddSource(),
  56. ;        SoundComponentGetInfo(), SoundComponentGetSource(), SoundComponentGetSourceData(),
  57. ;        SoundComponentInitOutputDevice(), SoundComponentPauseSource(),
  58. ;        SoundComponentPlaySourceBuffer(), SoundComponentRemoveSource(),
  59. ;        SoundComponentSetInfo(), SoundComponentSetOutput(), SoundComponentSetSource(),
  60. ;        SoundComponentStartSource(), SoundComponentStopSource(),
  61. ;        ParseAIFFHeader(), ParseSndHeader(), SoundConverterGetInfo(), SoundConverterSetInfo()
  62. ;
  63.  
  64. ; 
  65. ;    Interfaces for Sound Driver, !!! OBSOLETE and NOT SUPPORTED !!!
  66. ;
  67. ;    These items are no longer defined, but appear here so that someone
  68. ;    searching the interfaces might find them. If you are using one of these
  69. ;    items, you must change your code to support the Sound Manager.
  70. ;
  71. ;        swMode, ftMode, ffMode
  72. ;        FreeWave, FFSynthRec, Tone, SWSynthRec, Wave, FTSoundRec
  73. ;        SndCompletionProcPtr
  74. ;        StartSound, StopSound, SoundDone
  75. ;
  76.  
  77.  
  78. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  79. ;   constants
  80. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  81.  
  82.  
  83.  
  84. soundListRsrc                    EQU        'snd '                ;Resource type used by Sound Manager
  85.  
  86. kSimpleBeepID                    EQU        1                    ;reserved resource ID for Simple Beep
  87.  
  88. rate48khz                        EQU        $BB800000            ;48000.00000 in fixed-point
  89. rate44khz                        EQU        $AC440000            ;44100.00000 in fixed-point
  90. rate22050hz                        EQU        $56220000            ;22050.00000 in fixed-point
  91. rate22khz                        EQU        $56EE8BA3            ;22254.54545 in fixed-point
  92. rate11khz                        EQU        $2B7745D1            ;11127.27273 in fixed-point
  93. rate11025hz                        EQU        $2B110000            ;11025.00000 in fixed-point
  94.  
  95.                                                             ;synthesizer numbers for SndNewChannel
  96. squareWaveSynth                    EQU        1                    ;square wave synthesizer
  97. waveTableSynth                    EQU        3                    ;wave table synthesizer
  98. sampledSynth                    EQU        5                    ;sampled sound synthesizer
  99.                                                             ;old Sound Manager MACE synthesizer numbers
  100. MACE3snthID                        EQU        11
  101. MACE6snthID                        EQU        13
  102.  
  103. kMiddleC                        EQU        60                    ;MIDI note value for middle C
  104.  
  105. kNoVolume                        EQU        0                    ;setting for no sound volume
  106. kFullVolume                        EQU        $0100                ;1.0, setting for full hardware output volume
  107.  
  108. stdQLength                        EQU        128
  109.  
  110. dataOffsetFlag                    EQU        $8000
  111.  
  112. kUseOptionalOutputDevice        EQU        -1                    ;only for Sound Manager 3.0 or later
  113.  
  114. notCompressed                    EQU        0                    ;compression ID's
  115. fixedCompression                EQU        -1                    ;compression ID for fixed-sized compression
  116. variableCompression                EQU        -2                    ;compression ID for variable-sized compression
  117.  
  118. twoToOne                        EQU        1
  119. eightToThree                    EQU        2
  120. threeToOne                        EQU        3
  121. sixToOne                        EQU        4
  122. sixToOnePacketSize                EQU        8
  123. threeToOnePacketSize            EQU        16
  124.  
  125. stateBlockSize                    EQU        64
  126. leftOverBlockSize                EQU        32
  127.  
  128. firstSoundFormat                EQU        $0001                ;general sound format
  129. secondSoundFormat                EQU        $0002                ;special sampled sound format (HyperCard)
  130.  
  131. dbBufferReady                    EQU        $00000001            ;double buffer is filled
  132. dbLastBuffer                    EQU        $00000004            ;last double buffer to play
  133.  
  134. sysBeepDisable                    EQU        $0000                ;SysBeep() enable flags
  135. sysBeepEnable                    EQU        $01
  136. sysBeepSynchronous                EQU        $02                    ;if bit set, make alert sounds synchronous
  137.  
  138. unitTypeNoSelection                EQU        $FFFF                ;unitTypes for AudioSelection.unitType
  139. unitTypeSeconds                    EQU        $0000
  140. ; PPCAsm thinks “extSH” is a directive and therefore can't be a constant (?)
  141. ; But the 68k Asm needs to have these constants, so wrap them inside TARGET_CPU_68K
  142.     IF TARGET_CPU_68K THEN
  143.  
  144. stdSH                            EQU        $00                    ;Standard sound header encode value
  145. extSH                            EQU        $FF                    ;Extended sound header encode value
  146. cmpSH                            EQU        $FE                    ;Compressed sound header encode value
  147.     ENDIF    ; TARGET_CPU_68K
  148. ; command numbers for SndDoCommand and SndDoImmediate
  149.  
  150. nullCmd                            EQU        0
  151. initCmd                            EQU        1
  152. freeCmd                            EQU        2
  153. quietCmd                        EQU        3
  154. flushCmd                        EQU        4
  155. reInitCmd                        EQU        5
  156. waitCmd                            EQU        10
  157. pauseCmd                        EQU        11
  158. resumeCmd                        EQU        12
  159. callBackCmd                        EQU        13
  160. syncCmd                            EQU        14
  161. availableCmd                    EQU        24
  162. versionCmd                        EQU        25
  163. totalLoadCmd                    EQU        26
  164. loadCmd                            EQU        27
  165. freqDurationCmd                    EQU        40
  166. restCmd                            EQU        41
  167. freqCmd                            EQU        42
  168. ampCmd                            EQU        43
  169. timbreCmd                        EQU        44
  170. getAmpCmd                        EQU        45
  171. volumeCmd                        EQU        46                    ;sound manager 3.0 or later only
  172. getVolumeCmd                    EQU        47                    ;sound manager 3.0 or later only
  173. clockComponentCmd                EQU        50                    ;sound manager 3.2.1 or later only
  174. getClockComponentCmd            EQU        51                    ;sound manager 3.2.1 or later only
  175. scheduledSoundCmd                EQU        52                    ;sound manager 3.3 or later only
  176. linkSoundComponentsCmd            EQU        53                    ;sound manager 3.3 or later only
  177. waveTableCmd                    EQU        60
  178. phaseCmd                        EQU        61
  179. soundCmd                        EQU        80
  180. bufferCmd                        EQU        81
  181. rateCmd                            EQU        82
  182. continueCmd                        EQU        83
  183. doubleBufferCmd                    EQU        84
  184. getRateCmd                        EQU        85
  185. rateMultiplierCmd                EQU        86
  186. getRateMultiplierCmd            EQU        87
  187. sizeCmd                            EQU        90                    ;obsolete command
  188. convertCmd                        EQU        91                    ;obsolete MACE command
  189.     IF OLDROUTINENAMES THEN
  190. ; channel initialization parameters
  191.  
  192. waveInitChannelMask                EQU        $07
  193. waveInitChannel0                EQU        $04                    ;wave table only, Sound Manager 2.0 and earlier
  194. waveInitChannel1                EQU        $05                    ;wave table only, Sound Manager 2.0 and earlier
  195. waveInitChannel2                EQU        $06                    ;wave table only, Sound Manager 2.0 and earlier
  196. waveInitChannel3                EQU        $07                    ;wave table only, Sound Manager 2.0 and earlier
  197. initChan0                        EQU        $04                    ;obsolete spelling
  198. initChan1                        EQU        $05                    ;obsolete spelling
  199. initChan2                        EQU        $06                    ;obsolete spelling
  200. initChan3                        EQU        $07                    ;obsolete spelling
  201.  
  202. outsideCmpSH                    EQU        0                    ;obsolete MACE constant
  203. insideCmpSH                        EQU        1                    ;obsolete MACE constant
  204. aceSuccess                        EQU        0                    ;obsolete MACE constant
  205. aceMemFull                        EQU        1                    ;obsolete MACE constant
  206. aceNilBlock                        EQU        2                    ;obsolete MACE constant
  207. aceBadComp                        EQU        3                    ;obsolete MACE constant
  208. aceBadEncode                    EQU        4                    ;obsolete MACE constant
  209. aceBadDest                        EQU        5                    ;obsolete MACE constant
  210. aceBadCmd                        EQU        6                    ;obsolete MACE constant
  211.     ENDIF    ; OLDROUTINENAMES
  212.  
  213. initChanLeft                    EQU        $0002                ;left stereo channel
  214. initChanRight                    EQU        $0003                ;right stereo channel
  215. initNoInterp                    EQU        $0004                ;no linear interpolation
  216. initNoDrop                        EQU        $0008                ;no drop-sample conversion
  217. initMono                        EQU        $0080                ;monophonic channel
  218. initStereo                        EQU        $00C0                ;stereo channel
  219. initMACE3                        EQU        $0300                ;MACE 3:1
  220. initMACE6                        EQU        $0400                ;MACE 6:1
  221. initPanMask                        EQU        $0003                ;mask for right/left pan values
  222. initSRateMask                    EQU        $0030                ;mask for sample rate values
  223. initStereoMask                    EQU        $00C0                ;mask for mono/stereo values
  224. initCompMask                    EQU        $FF00                ;mask for compression IDs
  225. ; Get&Set Sound Information Selectors
  226.  
  227. siActiveChannels                EQU        'chac'                ;active channels
  228. siActiveLevels                    EQU        'lmac'                ;active meter levels
  229. siAGCOnOff                        EQU        'agc '                ;automatic gain control state
  230. siAsync                            EQU        'asyn'                ;asynchronous capability
  231. siAVDisplayBehavior                EQU        'avdb'
  232. siChannelAvailable                EQU        'chav'                ;number of channels available
  233. siCompressionAvailable            EQU        'cmav'                ;compression types available
  234. siCompressionChannels            EQU        'cpct'                ;compressor's number of channels
  235. siCompressionFactor                EQU        'cmfa'                ;current compression factor
  236. siCompressionHeader                EQU        'cmhd'                ;return compression header
  237. siCompressionNames                EQU        'cnam'                ;compression type names available
  238. siCompressionParams                EQU        'evaw'                ;compression parameters
  239. siCompressionSampleRate            EQU        'cprt'                ;compressor's sample rate
  240. siCompressionType                EQU        'comp'                ;current compression type
  241. siContinuous                    EQU        'cont'                ;continous recording
  242. siDecompressionParams            EQU        'wave'                ;decompression parameters
  243. siDeviceBufferInfo                EQU        'dbin'                ;size of interrupt buffer
  244. siDeviceConnected                EQU        'dcon'                ;input device connection status
  245. siDeviceIcon                    EQU        'icon'                ;input device icon
  246. siDeviceName                    EQU        'name'                ;input device name
  247. siHardwareBalance                EQU        'hbal'
  248. siHardwareBalanceSteps            EQU        'hbls'
  249. siHardwareBass                    EQU        'hbas'
  250. siHardwareBassSteps                EQU        'hbst'
  251. siHardwareBusy                    EQU        'hwbs'                ;sound hardware is in use
  252. siHardwareFormat                EQU        'hwfm'                ;get hardware format
  253. siHardwareMute                    EQU        'hmut'                ;mute state of all hardware
  254. siHardwareTreble                EQU        'htrb'
  255. siHardwareTrebleSteps            EQU        'hwts'
  256. siHardwareVolume                EQU        'hvol'                ;volume level of all hardware
  257. siHardwareVolumeSteps            EQU        'hstp'                ;number of volume steps for hardware
  258. siHeadphoneMute                    EQU        'pmut'                ;mute state of headphones
  259. siHeadphoneVolume                EQU        'pvol'                ;volume level of headphones
  260. siHeadphoneVolumeSteps            EQU        'hdst'                ;number of volume steps for headphones
  261. siInputAvailable                EQU        'inav'                ;input sources available
  262. siInputGain                        EQU        'gain'                ;input gain
  263. siInputSource                    EQU        'sour'                ;input source selector
  264. siInputSourceNames                EQU        'snam'                ;input source names
  265. siLevelMeterOnOff                EQU        'lmet'                ;level meter state
  266. siModemGain                        EQU        'mgai'                ;modem input gain
  267. siMonitorAvailable                EQU        'mnav'
  268. siMonitorSource                    EQU        'mons'
  269. siNumberChannels                EQU        'chan'                ;current number of channels
  270. siOptionsDialog                    EQU        'optd'                ;display options dialog
  271. siOSTypeInputSource                EQU        'inpt'                ;input source by OSType
  272. siOSTypeInputAvailable            EQU        'inav'                ;list of available input source OSTypes
  273. siPlayThruOnOff                    EQU        'plth'                ;playthrough state
  274. siPostMixerSoundComponent        EQU        'psmx'                ;install post-mixer effect
  275. siPreMixerSoundComponent        EQU        'prmx'                ;install pre-mixer effect
  276. siQuality                        EQU        'qual'                ;quality setting
  277. siRateMultiplier                EQU        'rmul'                ;throttle rate setting
  278. siRecordingQuality                EQU        'qual'                ;recording quality
  279. siSampleRate                    EQU        'srat'                ;current sample rate
  280. siSampleRateAvailable            EQU        'srav'                ;sample rates available
  281. siSampleSize                    EQU        'ssiz'                ;current sample size
  282. siSampleSizeAvailable            EQU        'ssav'                ;sample sizes available
  283. siSetupCDAudio                    EQU        'sucd'                ;setup sound hardware for CD audio
  284. siSetupModemAudio                EQU        'sumd'                ;setup sound hardware for modem audio
  285. siSlopeAndIntercept                EQU        'flap'                ;floating point variables for conversion
  286. siSoundClock                    EQU        'sclk'
  287. siUseThisSoundClock                EQU        'sclc'                ;sdev uses this to tell the mixer to use his sound clock
  288. siSpeakerMute                    EQU        'smut'                ;mute state of all built-in speaker
  289. siSpeakerVolume                    EQU        'svol'                ;volume level of built-in speaker
  290. siSSpCPULoadLimit                EQU        '3dll'
  291. siSSpLocalization                EQU        '3dif'
  292. siSSpSpeakerSetup                EQU        '3dst'
  293. siStereoInputGain                EQU        'sgai'                ;stereo input gain
  294. siSubwooferMute                    EQU        'bmut'                ;mute state of sub-woofer
  295. siTwosComplementOnOff            EQU        'twos'                ;two's complement state
  296. siVolume                        EQU        'volu'                ;volume level of source
  297. siVoxRecordInfo                    EQU        'voxr'                ;VOX record parameters
  298. siVoxStopInfo                    EQU        'voxs'                ;VOX stop parameters
  299. siWideStereo                    EQU        'wide'                ;wide stereo setting
  300.  
  301. siCloseDriver                    EQU        'clos'                ;reserved for internal use only
  302. siInitializeDriver                EQU        'init'                ;reserved for internal use only
  303. siPauseRecording                EQU        'paus'                ;reserved for internal use only
  304. siUserInterruptProc                EQU        'user'                ;reserved for internal use only
  305. ;  input source Types
  306.  
  307. kInvalidSource                    EQU        $FFFFFFFF            ;this source may be returned from GetInfo if no other source is the monitored source
  308. kNoSource                        EQU        'none'                ;no source selection
  309. kCDSource                        EQU        'cd  '                ;internal CD player input
  310. kExtMicSource                    EQU        'emic'                ;external mic input
  311. kSoundInSource                    EQU        'sinj'                ;sound input jack
  312. kRCAInSource                    EQU        'irca'                ;RCA jack input
  313. kTVFMTunerSource                EQU        'tvfm'
  314. kDAVInSource                    EQU        'idav'                ;DAV analog input
  315. kIntMicSource                    EQU        'imic'                ;internal mic input
  316. kMediaBaySource                    EQU        'mbay'                ;media bay input
  317. kModemSource                    EQU        'modm'                ;modem input (internal modem on desktops, PCI input on PowerBooks)
  318. kPCCardSource                    EQU        'pcm '                ;PC Card pwm input
  319. kZoomVideoSource                EQU        'zvpc'                ;zoom video input
  320. kDVDSource                        EQU        'dvda'                ;DVD audio input
  321. ; Sound Component Types and Subtypes
  322.  
  323. kNoSoundComponentType            EQU        '****'
  324. kSoundComponentType                EQU        'sift'                ;component type
  325. kSoundComponentPPCType            EQU        'nift'                ;component type for PowerPC code
  326. kRate8SubType                    EQU        'ratb'                ;8-bit rate converter
  327. kRate16SubType                    EQU        'ratw'                ;16-bit rate converter
  328. kConverterSubType                EQU        'conv'                ;sample format converter
  329. kSndSourceSubType                EQU        'sour'                ;generic source component
  330. kMixerType                        EQU        'mixr'
  331. kMixer8SubType                    EQU        'mixb'                ;8-bit mixer
  332. kMixer16SubType                    EQU        'mixw'                ;16-bit mixer
  333. kSoundInputDeviceType            EQU        'sinp'                ;sound input component
  334. kWaveInSubType                    EQU        'wavi'                ;Windows Wave
  335. kSoundOutputDeviceType            EQU        'sdev'                ;sound output component
  336. kClassicSubType                    EQU        'clas'                ;classic hardware, i.e. Mac Plus
  337. kASCSubType                        EQU        'asc '                ;Apple Sound Chip device
  338. kDSPSubType                        EQU        'dsp '                ;DSP device
  339. kAwacsSubType                    EQU        'awac'                ;Another of Will's Audio Chips device
  340. kGCAwacsSubType                    EQU        'awgc'                ;Awacs audio with Grand Central DMA
  341. kSingerSubType                    EQU        'sing'                ;Singer (via Whitney) based sound
  342. kSinger2SubType                    EQU        'sng2'                ;Singer 2 (via Whitney) for Acme
  343. kWhitSubType                    EQU        'whit'                ;Whit sound component for PrimeTime 3
  344. kSoundBlasterSubType            EQU        'sbls'                ;Sound Blaster for CHRP
  345. kWaveOutSubType                    EQU        'wavo'                ;Windows Wave
  346. kDirectSoundSubType                EQU        'dsnd'                ;Direct Sound
  347. kUNIXsdevSubType                EQU        'un1x'                ;UNIX base sdev
  348. kSoundCompressor                EQU        'scom'
  349. kSoundDecompressor                EQU        'sdec'
  350. kAudioComponentType                EQU        'adio'                ;Audio components and sub-types
  351. kAwacsPhoneSubType                EQU        'hphn'
  352. kAudioVisionSpeakerSubType        EQU        'telc'
  353. kAudioVisionHeadphoneSubType    EQU        'telh'
  354. kPhilipsFaderSubType            EQU        'tvav'
  355. kSGSToneSubType                    EQU        'sgs0'
  356. kSoundEffectsType                EQU        'snfx'                ;sound effects type
  357. kSSpLocalizationSubType            EQU        'snd3'
  358. ; Format Types
  359.  
  360. kSoundNotCompressed                EQU        'NONE'                ;sound is not compressed
  361. k8BitOffsetBinaryFormat            EQU        'raw '                ;8-bit offset binary
  362. k16BitBigEndianFormat            EQU        'twos'                ;16-bit big endian
  363. k16BitLittleEndianFormat        EQU        'sowt'                ;16-bit little endian
  364. kFloat32Format                    EQU        'fl32'                ;32-bit floating point
  365. kFloat64Format                    EQU        'fl64'                ;64-bit floating point
  366. k24BitFormat                    EQU        'in24'                ;24-bit integer
  367. k32BitFormat                    EQU        'in32'                ;32-bit integer
  368. kMACE3Compression                EQU        'MAC3'                ;MACE 3:1
  369. kMACE6Compression                EQU        'MAC6'                ;MACE 6:1
  370. kCDXA4Compression                EQU        'cdx4'                ;CD/XA 4:1
  371. kCDXA2Compression                EQU        'cdx2'                ;CD/XA 2:1
  372. kIMACompression                    EQU        'ima4'                ;IMA 4:1
  373. kULawCompression                EQU        'ulaw'                ;µLaw 2:1
  374. kALawCompression                EQU        'alaw'                ;aLaw 2:1
  375. kMicrosoftADPCMFormat            EQU        $6D730002            ;Microsoft ADPCM - ACM code 2
  376. kDVIIntelIMAFormat                EQU        $6D730011            ;DVI/Intel IMA ADPCM - ACM code 17
  377. kDVAudioFormat                    EQU        'dvca'                ;DV Audio
  378. kQDesignCompression                EQU        'QDMC'                ;QDesign music
  379. kQUALCOMMCompression            EQU        'Qclp'                ;QUALCOMM PureVoice
  380. kOffsetBinary                    EQU        'raw '                ;for compatibility
  381. kTwosComplement                    EQU        'twos'                ;for compatibility
  382. kLittleEndianFormat                EQU        'sowt'                ;for compatibility
  383.     IF TARGET_RT_LITTLE_ENDIAN THEN
  384.  
  385. k16BitNativeEndianFormat        EQU        'sowt'
  386. k16BitNonNativeEndianFormat        EQU        'twos'
  387.     ELSE
  388.  
  389. k16BitNativeEndianFormat        EQU        'twos'
  390. k16BitNonNativeEndianFormat        EQU        'sowt'
  391.     ENDIF    ; TARGET_RT_LITTLE_ENDIAN
  392. ; Features Flags
  393.  
  394. k8BitRawIn                        EQU        $01                    ;data description
  395. k8BitTwosIn                        EQU        $02
  396. k16BitIn                        EQU        $04
  397. kStereoIn                        EQU        $08
  398. k8BitRawOut                        EQU        $0100
  399. k8BitTwosOut                    EQU        $0200
  400. k16BitOut                        EQU        $0400
  401. kStereoOut                        EQU        $0800
  402. kReverse                        EQU        $00010000            ;  function description
  403. kRateConvert                    EQU        $00020000
  404. kCreateSoundSource                EQU        $00040000
  405. kHighQuality                    EQU        $00400000            ;  performance description
  406. kNonRealTime                    EQU        $00800000
  407. ; SoundComponentPlaySourceBuffer action flags
  408.  
  409. kSourcePaused                    EQU        $01
  410. kPassThrough                    EQU        $00010000
  411. kNoSoundComponentChain            EQU        $00020000
  412. ; SoundParamBlock flags, usefull for OpenMixerSoundComponent
  413.  
  414. kNoMixing                        EQU        $01                    ;don't mix source
  415. kNoSampleRateConversion            EQU        $02                    ;don't convert sample rate (i.e. 11 kHz -> 22 kHz)
  416. kNoSampleSizeConversion            EQU        $04                    ;don't convert sample size (i.e. 16 -> 8)
  417. kNoSampleFormatConversion        EQU        $08                    ;don't convert sample format (i.e. 'twos' -> 'raw ')
  418. kNoChannelConversion            EQU        $10                    ;don't convert stereo/mono
  419. kNoDecompression                EQU        $20                    ;don't decompress (i.e. 'MAC3' -> 'raw ')
  420. kNoVolumeConversion                EQU        $40                    ;don't apply volume
  421. kNoRealtimeProcessing            EQU        $80                    ;won't run at interrupt time
  422. kScheduledSource                EQU        $0100                ;source is scheduled
  423. ; SoundParamBlock quality settings
  424.  
  425. kBestQuality                    EQU        $01                    ;use interpolation in rate conversion
  426. ; useful bit masks
  427.  
  428. kInputMask                        EQU        $000000FF            ;masks off input bits
  429. kOutputMask                        EQU        $0000FF00            ;masks off output bits
  430. kOutputShift                    EQU        8                    ;amount output bits are shifted
  431. kActionMask                        EQU        $00FF0000            ;masks off action bits
  432. kSoundComponentBits                EQU        $00FFFFFF
  433. ; audio atom types
  434.  
  435. kAudioFormatAtomType            EQU        'frma'
  436. kAudioEndianAtomType            EQU        'enda'
  437. kAudioTerminatorAtomType        EQU        0
  438. ; siAVDisplayBehavior types
  439.  
  440. kAVDisplayHeadphoneRemove        EQU        0                    ; monitor does not have a headphone attached
  441. kAVDisplayHeadphoneInsert        EQU        1                    ; monitor has a headphone attached
  442. kAVDisplayPlainTalkRemove        EQU        2                    ; monitor either sending no input through CPU input port or unable to tell if input is coming in
  443. kAVDisplayPlainTalkInsert        EQU        3                    ; monitor sending PlainTalk level microphone source input through sound input port
  444. ; Audio Component constants
  445.  
  446.                                                             ;Values for whichChannel parameter
  447. audioAllChannels                EQU        0                    ;All channels (usually interpreted as both left and right)
  448. audioLeftChannel                EQU        1                    ;Left channel
  449. audioRightChannel                EQU        2                    ;Right channel
  450.                                                             ;Values for mute parameter
  451. audioUnmuted                    EQU        0                    ;Device is unmuted
  452. audioMuted                        EQU        1                    ;Device is muted
  453.                                                             ;Capabilities flags definitions
  454. audioDoesMono                    EQU        $00000001            ;Device supports mono output
  455. audioDoesStereo                    EQU        $00000002            ;Device supports stereo output
  456. audioDoesIndependentChannels    EQU        $00000004            ;Device supports independent software control of each channel
  457. ; Sound Input Qualities
  458.  
  459. siCDQuality                        EQU        'cd  '                ;44.1kHz, stereo, 16 bit
  460. siBestQuality                    EQU        'best'                ;22kHz, mono, 8 bit
  461. siBetterQuality                    EQU        'betr'                ;22kHz, mono, MACE 3:1
  462. siGoodQuality                    EQU        'good'                ;22kHz, mono, MACE 6:1
  463. siNoneQuality                    EQU        'none'                ;settings don't match any quality for a get call
  464.  
  465. siDeviceIsConnected                EQU        1                    ;input device is connected and ready for input
  466. siDeviceNotConnected            EQU        0                    ;input device is not connected
  467. siDontKnowIfConnected            EQU        -1                    ;can't tell if input device is connected
  468. siReadPermission                EQU        0                    ;permission passed to SPBOpenDevice
  469. siWritePermission                EQU        1                    ;permission passed to SPBOpenDevice
  470.  
  471. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  472. ;   typedefs
  473. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  474.  
  475.  
  476.  
  477. SndCommand                RECORD 0
  478. cmd                         ds.w    1                ; offset: $0 (0)
  479. param1                     ds.w    1                ; offset: $2 (2)
  480. param2                     ds.l    1                ; offset: $4 (4)
  481. sizeof                     EQU *                    ; size:   $8 (8)
  482.                         ENDR
  483.  
  484.  
  485. ; typedef SndChannel *                    SndChannelPtr
  486.  
  487. SndChannel                RECORD 0
  488. nextChan                 ds.l    1                ; offset: $0 (0)
  489. firstMod                 ds.l    1                ; offset: $4 (4)        ;  reserved for the Sound Manager 
  490. callBack                 ds.l    1                ; offset: $8 (8)
  491. userInfo                 ds.l    1                ; offset: $C (12)
  492. wait                     ds.l    1                ; offset: $10 (16)        ;  The following is for internal Sound Manager use only.
  493. cmdInProgress             ds        SndCommand        ; offset: $14 (20)
  494. flags                     ds.w    1                ; offset: $1C (28)
  495. qLength                     ds.w    1                ; offset: $1E (30)
  496. qHead                     ds.w    1                ; offset: $20 (32)
  497. qTail                     ds.w    1                ; offset: $22 (34)
  498. queue                     ds.b    128 * SndCommand.sizeof ; offset: $24 (36)
  499. sizeof                     EQU *                    ; size:   $424 (1060)
  500.                         ENDR
  501. ; MACE structures
  502. StateBlock                RECORD 0
  503. stateVar                 ds.w    64                ; offset: $0 (0)
  504. sizeof                     EQU *                    ; size:   $80 (128)
  505.                         ENDR
  506. ; typedef struct StateBlock *            StateBlockPtr
  507.  
  508. LeftOverBlock            RECORD 0
  509. count                     ds.l    1                ; offset: $0 (0)
  510. sampleArea                 ds.b    32                ; offset: $4 (4)
  511. sizeof                     EQU *                    ; size:   $24 (36)
  512.                         ENDR
  513. ; typedef struct LeftOverBlock *        LeftOverBlockPtr
  514.  
  515. ModRef                    RECORD 0
  516. modNumber                 ds.w    1                ; offset: $0 (0)
  517. modInit                     ds.l    1                ; offset: $2 (2)
  518. sizeof                     EQU *                    ; size:   $6 (6)
  519.                         ENDR
  520. SndListResource            RECORD 0
  521. format                     ds.w    1                ; offset: $0 (0)
  522. numModifiers             ds.w    1                ; offset: $2 (2)
  523. modifierPart             ds        ModRef            ; offset: $4 (4) <-- really an array of length one
  524. numCommands                 ds.w    1                ; offset: $A (10)
  525. commandPart                 ds        SndCommand        ; offset: $C (12) <-- really an array of length one
  526. dataPart                 ds.b    1                ; offset: $14 (20) <-- really an array of length one
  527.                          ORG 22
  528. sizeof                     EQU *                    ; size:   $16 (22)
  529.                         ENDR
  530. ; typedef struct SndListResource *        SndListPtr
  531.  
  532. ; typedef SndListPtr *                    SndListHandle
  533.  
  534. ; typedef SndListHandle                 SndListHndl
  535.  
  536. ; HyperCard sound resource format
  537. Snd2ListResource        RECORD 0
  538. format                     ds.w    1                ; offset: $0 (0)
  539. refCount                 ds.w    1                ; offset: $2 (2)
  540. numCommands                 ds.w    1                ; offset: $4 (4)
  541. commandPart                 ds        SndCommand        ; offset: $6 (6) <-- really an array of length one
  542. dataPart                 ds.b    1                ; offset: $E (14) <-- really an array of length one
  543.                          ORG 16
  544. sizeof                     EQU *                    ; size:   $10 (16)
  545.                         ENDR
  546. ; typedef struct Snd2ListResource *        Snd2ListPtr
  547.  
  548. ; typedef Snd2ListPtr *                    Snd2ListHandle
  549.  
  550. ; typedef Snd2ListHandle                 Snd2ListHndl
  551.  
  552. SoundHeader                RECORD 0
  553. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if NIL then samples are in sampleArea
  554. length                     ds.l    1                ; offset: $4 (4)        ; length of sound in bytes
  555. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate for this sound
  556. loopStart                 ds.l    1                ; offset: $C (12)        ; start of looping portion
  557. loopEnd                     ds.l    1                ; offset: $10 (16)        ; end of looping portion
  558. encode                     ds.b    1                ; offset: $14 (20)        ; header encoding
  559. baseFrequency             ds.b    1                ; offset: $15 (21)        ; baseFrequency value
  560. sampleArea                 ds.b    1                ; offset: $16 (22) <-- really an array of length one ; space for when samples follow directly
  561.                          ORG 24
  562. sizeof                     EQU *                    ; size:   $18 (24)
  563.                         ENDR
  564. ; typedef struct SoundHeader *            SoundHeaderPtr
  565.  
  566. CmpSoundHeader            RECORD 0
  567. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if nil then samples are in sample area
  568. numChannels                 ds.l    1                ; offset: $4 (4)        ; number of channels i.e. mono = 1
  569. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate in Apples Fixed point representation
  570. loopStart                 ds.l    1                ; offset: $C (12)        ; loopStart of sound before compression
  571. loopEnd                     ds.l    1                ; offset: $10 (16)        ; loopEnd of sound before compression
  572. encode                     ds.b    1                ; offset: $14 (20)        ; data structure used , stdSH, extSH, or cmpSH
  573. baseFrequency             ds.b    1                ; offset: $15 (21)        ; same meaning as regular SoundHeader
  574. numFrames                 ds.l    1                ; offset: $16 (22)        ; length in frames ( packetFrames or sampleFrames )
  575. AIFFSampleRate             ds        extended80        ; offset: $1A (26)        ; IEEE sample rate
  576. markerChunk                 ds.l    1                ; offset: $24 (36)        ; sync track
  577. format                     ds.l    1                ; offset: $28 (40)        ; data format type, was futureUse1
  578. futureUse2                 ds.l    1                ; offset: $2C (44)        ; reserved by Apple
  579. stateVars                 ds.l    1                ; offset: $30 (48)        ; pointer to State Block
  580. leftOverSamples             ds.l    1                ; offset: $34 (52)        ; used to save truncated samples between compression calls
  581. compressionID             ds.w    1                ; offset: $38 (56)        ; 0 means no compression, non zero means compressionID
  582. packetSize                 ds.w    1                ; offset: $3A (58)        ; number of bits in compressed sample packet
  583. snthID                     ds.w    1                ; offset: $3C (60)        ; resource ID of Sound Manager snth that contains NRT C/E
  584. sampleSize                 ds.w    1                ; offset: $3E (62)        ; number of bits in non-compressed sample
  585. sampleArea                 ds.b    1                ; offset: $40 (64) <-- really an array of length one ; space for when samples follow directly
  586.                          ORG 66
  587. sizeof                     EQU *                    ; size:   $42 (66)
  588.                         ENDR
  589. ; typedef struct CmpSoundHeader *        CmpSoundHeaderPtr
  590.  
  591. ExtSoundHeader            RECORD 0
  592. samplePtr                 ds.l    1                ; offset: $0 (0)        ; if nil then samples are in sample area
  593. numChannels                 ds.l    1                ; offset: $4 (4)        ; number of channels,  ie mono = 1
  594. sampleRate                 ds.l    1                ; offset: $8 (8)        ; sample rate in Apples Fixed point representation
  595. loopStart                 ds.l    1                ; offset: $C (12)        ; same meaning as regular SoundHeader
  596. loopEnd                     ds.l    1                ; offset: $10 (16)        ; same meaning as regular SoundHeader
  597. encode                     ds.b    1                ; offset: $14 (20)        ; data structure used , stdSH, extSH, or cmpSH
  598. baseFrequency             ds.b    1                ; offset: $15 (21)        ; same meaning as regular SoundHeader
  599. numFrames                 ds.l    1                ; offset: $16 (22)        ; length in total number of frames
  600. AIFFSampleRate             ds        extended80        ; offset: $1A (26)        ; IEEE sample rate
  601. markerChunk                 ds.l    1                ; offset: $24 (36)        ; sync track
  602. instrumentChunks         ds.l    1                ; offset: $28 (40)        ; AIFF instrument chunks
  603. AESRecording             ds.l    1                ; offset: $2C (44)
  604. sampleSize                 ds.w    1                ; offset: $30 (48)        ; number of bits in sample
  605. futureUse1                 ds.w    1                ; offset: $32 (50)        ; reserved by Apple
  606. futureUse2                 ds.l    1                ; offset: $34 (52)        ; reserved by Apple
  607. futureUse3                 ds.l    1                ; offset: $38 (56)        ; reserved by Apple
  608. futureUse4                 ds.l    1                ; offset: $3C (60)        ; reserved by Apple
  609. sampleArea                 ds.b    1                ; offset: $40 (64) <-- really an array of length one ; space for when samples follow directly
  610.                          ORG 66
  611. sizeof                     EQU *                    ; size:   $42 (66)
  612.                         ENDR
  613. ; typedef struct ExtSoundHeader *        ExtSoundHeaderPtr
  614.  
  615. SoundHeaderUnion        RECORD 0
  616. stdHeader                 ds        SoundHeader        ; offset: $0 (0)
  617.                          ORG 0
  618. cmpHeader                 ds        CmpSoundHeader ; offset: $0 (0)
  619.                          ORG 0
  620. extHeader                 ds        ExtSoundHeader ; offset: $0 (0)
  621. sizeof                     EQU *                    ; size:   $42 (66)
  622.                         ENDR
  623. ConversionBlock            RECORD 0
  624. destination                 ds.w    1                ; offset: $0 (0)
  625. unused                     ds.w    1                ; offset: $2 (2)
  626. inputPtr                 ds.l    1                ; offset: $4 (4)
  627. outputPtr                 ds.l    1                ; offset: $8 (8)
  628. sizeof                     EQU *                    ; size:   $C (12)
  629.                         ENDR
  630. ; typedef struct ConversionBlock *        ConversionBlockPtr
  631.  
  632. ;  ScheduledSoundHeader flags
  633.  
  634. kScheduledSoundDoScheduled        EQU        $01
  635. kScheduledSoundDoCallBack        EQU        $02
  636. ScheduledSoundHeader    RECORD 0
  637. u                         ds        SoundHeaderUnion ; offset: $0 (0)
  638. flags                     ds.l    1                ; offset: $42 (66)
  639. reserved                 ds.w    1                ; offset: $46 (70)
  640. callBackParam1             ds.w    1                ; offset: $48 (72)
  641. callBackParam2             ds.l    1                ; offset: $4A (74)
  642. startTime                 ds        TimeRecord        ; offset: $4E (78)
  643. sizeof                     EQU *                    ; size:   $5E (94)
  644.                         ENDR
  645. ; typedef struct ScheduledSoundHeader *    ScheduledSoundHeaderPtr
  646.  
  647. SMStatus                RECORD 0
  648. smMaxCPULoad             ds.w    1                ; offset: $0 (0)
  649. smNumChannels             ds.w    1                ; offset: $2 (2)
  650. smCurCPULoad             ds.w    1                ; offset: $4 (4)
  651. sizeof                     EQU *                    ; size:   $6 (6)
  652.                         ENDR
  653. ; typedef struct SMStatus *                SMStatusPtr
  654.  
  655. SCStatus                RECORD 0
  656. scStartTime                 ds.l    1                ; offset: $0 (0)
  657. scEndTime                 ds.l    1                ; offset: $4 (4)
  658. scCurrentTime             ds.l    1                ; offset: $8 (8)
  659. scChannelBusy             ds.b    1                ; offset: $C (12)
  660. scChannelDisposed         ds.b    1                ; offset: $D (13)
  661. scChannelPaused             ds.b    1                ; offset: $E (14)
  662. scUnused                 ds.b    1                ; offset: $F (15)
  663. scChannelAttributes         ds.l    1                ; offset: $10 (16)
  664. scCPULoad                 ds.l    1                ; offset: $14 (20)
  665. sizeof                     EQU *                    ; size:   $18 (24)
  666.                         ENDR
  667. ; typedef struct SCStatus *                SCStatusPtr
  668.  
  669. AudioSelection            RECORD 0
  670. unitType                 ds.l    1                ; offset: $0 (0)
  671. selStart                 ds.l    1                ; offset: $4 (4)
  672. selEnd                     ds.l    1                ; offset: $8 (8)
  673. sizeof                     EQU *                    ; size:   $C (12)
  674.                         ENDR
  675. ; typedef struct AudioSelection *        AudioSelectionPtr
  676.  
  677. SndDoubleBuffer            RECORD 0
  678. dbNumFrames                 ds.l    1                ; offset: $0 (0)
  679. dbFlags                     ds.l    1                ; offset: $4 (4)
  680. dbUserInfo                 ds.l    2                ; offset: $8 (8)
  681. dbSoundData                 ds.b    1                ; offset: $10 (16) <-- really an array of length one
  682.                          ORG 18
  683. sizeof                     EQU *                    ; size:   $12 (18)
  684.                         ENDR
  685. ; typedef struct SndDoubleBuffer *        SndDoubleBufferPtr
  686.  
  687. SndDoubleBufferHeader    RECORD 0
  688. dbhNumChannels             ds.w    1                ; offset: $0 (0)
  689. dbhSampleSize             ds.w    1                ; offset: $2 (2)
  690. dbhCompressionID         ds.w    1                ; offset: $4 (4)
  691. dbhPacketSize             ds.w    1                ; offset: $6 (6)
  692. dbhSampleRate             ds.l    1                ; offset: $8 (8)
  693. dbhBufferPtr             ds.l    2                ; offset: $C (12)
  694. dbhDoubleBack             ds.l    1                ; offset: $14 (20)
  695. sizeof                     EQU *                    ; size:   $18 (24)
  696.                         ENDR
  697. ; typedef struct SndDoubleBufferHeader * SndDoubleBufferHeaderPtr
  698.  
  699. SndDoubleBufferHeader2    RECORD 0
  700. dbhNumChannels             ds.w    1                ; offset: $0 (0)
  701. dbhSampleSize             ds.w    1                ; offset: $2 (2)
  702. dbhCompressionID         ds.w    1                ; offset: $4 (4)
  703. dbhPacketSize             ds.w    1                ; offset: $6 (6)
  704. dbhSampleRate             ds.l    1                ; offset: $8 (8)
  705. dbhBufferPtr             ds.l    2                ; offset: $C (12)
  706. dbhDoubleBack             ds.l    1                ; offset: $14 (20)
  707. dbhFormat                 ds.l    1                ; offset: $18 (24)
  708. sizeof                     EQU *                    ; size:   $1C (28)
  709.                         ENDR
  710. ; typedef struct SndDoubleBufferHeader2 * SndDoubleBufferHeader2Ptr
  711.  
  712. SoundInfoList            RECORD 0
  713. count                     ds.w    1                ; offset: $0 (0)
  714. infoHandle                 ds.l    1                ; offset: $2 (2)
  715. sizeof                     EQU *                    ; size:   $6 (6)
  716.                         ENDR
  717. ; typedef struct SoundInfoList *        SoundInfoListPtr
  718.  
  719. SoundComponentData        RECORD 0
  720. flags                     ds.l    1                ; offset: $0 (0)
  721. format                     ds.l    1                ; offset: $4 (4)
  722. numChannels                 ds.w    1                ; offset: $8 (8)
  723. sampleSize                 ds.w    1                ; offset: $A (10)
  724. sampleRate                 ds.l    1                ; offset: $C (12)
  725. sampleCount                 ds.l    1                ; offset: $10 (16)
  726. buffer                     ds.l    1                ; offset: $14 (20)
  727. reserved                 ds.l    1                ; offset: $18 (24)
  728. sizeof                     EQU *                    ; size:   $1C (28)
  729.                         ENDR
  730. ; typedef struct SoundComponentData *    SoundComponentDataPtr
  731.  
  732.  
  733.  
  734. ; typedef SoundParamBlock *                SoundParamBlockPtr
  735.  
  736. SoundParamBlock            RECORD 0
  737. recordSize                 ds.l    1                ; offset: $0 (0)        ; size of this record in bytes
  738. desc                     ds        SoundComponentData ; offset: $4 (4)        ; description of sound buffer
  739. rateMultiplier             ds.l    1                ; offset: $20 (32)        ; rate multiplier to apply to sound
  740. leftVolume                 ds.w    1                ; offset: $24 (36)        ; volumes to apply to sound
  741. rightVolume                 ds.w    1                ; offset: $26 (38)
  742. quality                     ds.l    1                ; offset: $28 (40)        ; quality to apply to sound
  743. filter                     ds.l    1                ; offset: $2C (44)        ; filter to apply to sound
  744. moreRtn                     ds.l    1                ; offset: $30 (48)        ; routine to call to get more data
  745. completionRtn             ds.l    1                ; offset: $34 (52)        ; routine to call when buffer is complete
  746. refCon                     ds.l    1                ; offset: $38 (56)        ; user refcon
  747. result                     ds.w    1                ; offset: $3C (60)        ; result
  748. sizeof                     EQU *                    ; size:   $3E (62)
  749.                         ENDR
  750. CompressionInfo            RECORD 0
  751. recordSize                 ds.l    1                ; offset: $0 (0)
  752. format                     ds.l    1                ; offset: $4 (4)
  753. compressionID             ds.w    1                ; offset: $8 (8)
  754. samplesPerPacket         ds.w    1                ; offset: $A (10)
  755. bytesPerPacket             ds.w    1                ; offset: $C (12)
  756. bytesPerFrame             ds.w    1                ; offset: $E (14)
  757. bytesPerSample             ds.w    1                ; offset: $10 (16)
  758. futureUse1                 ds.w    1                ; offset: $12 (18)
  759. sizeof                     EQU *                    ; size:   $14 (20)
  760.                         ENDR
  761. ; typedef struct CompressionInfo *        CompressionInfoPtr
  762.  
  763. ; typedef CompressionInfoPtr *            CompressionInfoHandle
  764.  
  765. ; variables for floating point conversion
  766. SoundSlopeAndInterceptRecord RECORD 0
  767. slope                     ds        Float64            ; offset: $0 (0)
  768. intercept                 ds        Float64            ; offset: $8 (8)
  769. minClip                     ds        Float64            ; offset: $10 (16)
  770. maxClip                     ds        Float64            ; offset: $18 (24)
  771. sizeof                     EQU *                    ; size:   $20 (32)
  772.                         ENDR
  773. ; typedef struct SoundSlopeAndInterceptRecord * SoundSlopeAndInterceptPtr
  774.  
  775. ; private thing to use as a reference to a Sound Converter
  776.  
  777.  
  778. ; private thing to use as a reference to a Sound Source
  779.  
  780.  
  781. ; typedef SoundSource *                    SoundSourcePtr
  782.  
  783. SoundComponentLink        RECORD 0
  784. description                 ds        ComponentDescription ; offset: $0 (0)    ; Describes the sound component
  785. mixerID                     ds.l    1                ; offset: $14 (20)        ; Reserved by Apple
  786. linkID                     ds.l    1                ; offset: $18 (24)        ; Reserved by Apple
  787. sizeof                     EQU *                    ; size:   $1C (28)
  788.                         ENDR
  789. ; typedef struct SoundComponentLink *    SoundComponentLinkPtr
  790.  
  791. AudioInfo                RECORD 0
  792. capabilitiesFlags         ds.l    1                ; offset: $0 (0)        ; Describes device capabilities
  793. reserved                 ds.l    1                ; offset: $4 (4)        ; Reserved by Apple
  794. numVolumeSteps             ds.w    1                ; offset: $8 (8)        ; Number of significant increments between min and max volume
  795. sizeof                     EQU *                    ; size:   $A (10)
  796.                         ENDR
  797. ; typedef struct AudioInfo *            AudioInfoPtr
  798.  
  799. AudioFormatAtom            RECORD 0
  800. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioFormatAtom)
  801. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioFormatAtomType
  802. format                     ds.l    1                ; offset: $8 (8)
  803. sizeof                     EQU *                    ; size:   $C (12)
  804.                         ENDR
  805. ; typedef struct AudioFormatAtom *        AudioFormatAtomPtr
  806.  
  807. AudioEndianAtom            RECORD 0
  808. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioEndianAtom)
  809. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioEndianAtomType
  810. littleEndian             ds.w    1                ; offset: $8 (8)
  811. sizeof                     EQU *                    ; size:   $A (10)
  812.                         ENDR
  813. ; typedef struct AudioEndianAtom *        AudioEndianAtomPtr
  814.  
  815. AudioTerminatorAtom        RECORD 0
  816. size                     ds.l    1                ; offset: $0 (0)        ;  = sizeof(AudioTerminatorAtom)
  817. atomType                 ds.l    1                ; offset: $4 (4)        ;  = kAudioTerminatorAtomType
  818. sizeof                     EQU *                    ; size:   $8 (8)
  819.                         ENDR
  820. ; typedef struct AudioTerminatorAtom *    AudioTerminatorAtomPtr
  821.  
  822. ;  Sound Input Structures
  823.  
  824.  
  825. ; typedef SPB *                            SPBPtr
  826.  
  827. ; user procedures called by sound input routines
  828. ; Sound Input Parameter Block
  829. SPB                        RECORD 0
  830. inRefNum                 ds.l    1                ; offset: $0 (0)        ; reference number of sound input device
  831. count                     ds.l    1                ; offset: $4 (4)        ; number of bytes to record
  832. milliseconds             ds.l    1                ; offset: $8 (8)        ; number of milliseconds to record
  833. bufferLength             ds.l    1                ; offset: $C (12)        ; length of buffer in bytes
  834. bufferPtr                 ds.l    1                ; offset: $10 (16)        ; buffer to store sound data in
  835. completionRoutine         ds.l    1                ; offset: $14 (20)        ; completion routine
  836. interruptRoutine         ds.l    1                ; offset: $18 (24)        ; interrupt routine
  837. userLong                 ds.l    1                ; offset: $1C (28)        ; user-defined field
  838. error                     ds.w    1                ; offset: $20 (32)        ; error
  839. unused1                     ds.l    1                ; offset: $22 (34)        ; reserved - must be zero
  840. sizeof                     EQU *                    ; size:   $26 (38)
  841.                         ENDR
  842.  
  843. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  844. ;   prototypes
  845. ;  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  846.  
  847.  
  848.  
  849.  
  850. ;   These two routines for Get/SetSoundVol should no longer be used.
  851. ;   They were for old Apple Sound Chip machines, and do not support the DSP or PowerMacs.
  852. ;   Use Get/SetDefaultOutputVolume instead, if you must change the user's machine.
  853.  
  854.  
  855.  
  856.     IF TARGET_CPU_68K THEN
  857. ;
  858. ; pascal void SetSoundVol(short level)
  859. ;
  860.     IF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  861.         IMPORT_CFM_FUNCTION SetSoundVol
  862.     ENDIF
  863.  
  864.  
  865. ;
  866. ; pascal void GetSoundVol(short *level)
  867. ;
  868.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  869.         ; parameters:
  870.         ;    level           => A0
  871.         Macro
  872.         _GetSoundVol
  873.             clr.b               (A0)+
  874.             move.b              $0260,(A0)
  875.         EndM
  876.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  877.         IMPORT_CFM_FUNCTION GetSoundVol
  878.     ENDIF
  879.  
  880.     ENDIF    ; TARGET_CPU_68K
  881. ;  Sound Manager routines 
  882. ;
  883. ; pascal void SysBeep(short duration)
  884. ;
  885.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  886.         _SysBeep:    OPWORD    $A9C8
  887.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  888.         IMPORT_CFM_FUNCTION SysBeep
  889.     ENDIF
  890.  
  891. ;
  892. ; pascal OSErr SndDoCommand(SndChannelPtr chan, const SndCommand *cmd, Boolean noWait)
  893. ;
  894.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  895.         _SndDoCommand:    OPWORD    $A803
  896.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  897.         IMPORT_CFM_FUNCTION SndDoCommand
  898.     ENDIF
  899.  
  900. ;
  901. ; pascal OSErr SndDoImmediate(SndChannelPtr chan, const SndCommand *cmd)
  902. ;
  903.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  904.         _SndDoImmediate:    OPWORD    $A804
  905.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  906.         IMPORT_CFM_FUNCTION SndDoImmediate
  907.     ENDIF
  908.  
  909. ;
  910. ; pascal OSErr SndNewChannel(SndChannelPtr *chan, short synth, long init, SndCallBackUPP userRoutine)
  911. ;
  912.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  913.         _SndNewChannel:    OPWORD    $A807
  914.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  915.         IMPORT_CFM_FUNCTION SndNewChannel
  916.     ENDIF
  917.  
  918. ;
  919. ; pascal OSErr SndDisposeChannel(SndChannelPtr chan, Boolean quietNow)
  920. ;
  921.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  922.         _SndDisposeChannel:    OPWORD    $A801
  923.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  924.         IMPORT_CFM_FUNCTION SndDisposeChannel
  925.     ENDIF
  926.  
  927. ;
  928. ; pascal OSErr SndPlay(SndChannelPtr chan, SndListHandle sndHandle, Boolean async)
  929. ;
  930.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  931.         _SndPlay:    OPWORD    $A805
  932.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  933.         IMPORT_CFM_FUNCTION SndPlay
  934.     ENDIF
  935.  
  936.     IF OLDROUTINENAMES THEN
  937. ;
  938. ; pascal OSErr SndAddModifier(SndChannelPtr chan, Ptr modifier, short id, long init)
  939. ;
  940.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  941.         _SndAddModifier:    OPWORD    $A802
  942.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  943.         IMPORT_CFM_FUNCTION SndAddModifier
  944.     ENDIF
  945.  
  946.     ENDIF    ; OLDROUTINENAMES
  947. ;
  948. ; pascal OSErr SndControl(short id, SndCommand *cmd)
  949. ;
  950.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  951.         _SndControl:    OPWORD    $A806
  952.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  953.         IMPORT_CFM_FUNCTION SndControl
  954.     ENDIF
  955.  
  956. ;  Sound Manager 2.0 and later, uses _SoundDispatch 
  957. ;
  958. ; pascal NumVersion SndSoundManagerVersion(void )
  959. ;
  960.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  961.         Macro
  962.         _SndSoundManagerVersion
  963.             move.l              #$000C0008,D0
  964.             dc.w                $A800
  965.         EndM
  966.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  967.         IMPORT_CFM_FUNCTION SndSoundManagerVersion
  968.     ENDIF
  969.  
  970. ;
  971. ; pascal OSErr SndStartFilePlay(SndChannelPtr chan, short fRefNum, short resNum, long bufferSize, void *theBuffer, AudioSelectionPtr theSelection, FilePlayCompletionUPP theCompletion, Boolean async)
  972. ;
  973.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  974.         Macro
  975.         _SndStartFilePlay
  976.             move.l              #$0D000008,D0
  977.             dc.w                $A800
  978.         EndM
  979.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  980.         IMPORT_CFM_FUNCTION SndStartFilePlay
  981.     ENDIF
  982.  
  983. ;
  984. ; pascal OSErr SndPauseFilePlay(SndChannelPtr chan)
  985. ;
  986.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  987.         Macro
  988.         _SndPauseFilePlay
  989.             move.l              #$02040008,D0
  990.             dc.w                $A800
  991.         EndM
  992.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  993.         IMPORT_CFM_FUNCTION SndPauseFilePlay
  994.     ENDIF
  995.  
  996. ;
  997. ; pascal OSErr SndStopFilePlay(SndChannelPtr chan, Boolean quietNow)
  998. ;
  999.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1000.         Macro
  1001.         _SndStopFilePlay
  1002.             move.l              #$03080008,D0
  1003.             dc.w                $A800
  1004.         EndM
  1005.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1006.         IMPORT_CFM_FUNCTION SndStopFilePlay
  1007.     ENDIF
  1008.  
  1009. ;
  1010. ; pascal OSErr SndChannelStatus(SndChannelPtr chan, short theLength, SCStatusPtr theStatus)
  1011. ;
  1012.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1013.         Macro
  1014.         _SndChannelStatus
  1015.             move.l              #$05100008,D0
  1016.             dc.w                $A800
  1017.         EndM
  1018.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1019.         IMPORT_CFM_FUNCTION SndChannelStatus
  1020.     ENDIF
  1021.  
  1022. ;
  1023. ; pascal OSErr SndManagerStatus(short theLength, SMStatusPtr theStatus)
  1024. ;
  1025.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1026.         Macro
  1027.         _SndManagerStatus
  1028.             move.l              #$03140008,D0
  1029.             dc.w                $A800
  1030.         EndM
  1031.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1032.         IMPORT_CFM_FUNCTION SndManagerStatus
  1033.     ENDIF
  1034.  
  1035. ;
  1036. ; pascal void SndGetSysBeepState(short *sysBeepState)
  1037. ;
  1038.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1039.         Macro
  1040.         _SndGetSysBeepState
  1041.             move.l              #$02180008,D0
  1042.             dc.w                $A800
  1043.         EndM
  1044.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1045.         IMPORT_CFM_FUNCTION SndGetSysBeepState
  1046.     ENDIF
  1047.  
  1048. ;
  1049. ; pascal OSErr SndSetSysBeepState(short sysBeepState)
  1050. ;
  1051.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1052.         Macro
  1053.         _SndSetSysBeepState
  1054.             move.l              #$011C0008,D0
  1055.             dc.w                $A800
  1056.         EndM
  1057.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1058.         IMPORT_CFM_FUNCTION SndSetSysBeepState
  1059.     ENDIF
  1060.  
  1061. ;
  1062. ; pascal OSErr SndPlayDoubleBuffer(SndChannelPtr chan, SndDoubleBufferHeaderPtr theParams)
  1063. ;
  1064.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1065.         Macro
  1066.         _SndPlayDoubleBuffer
  1067.             move.l              #$04200008,D0
  1068.             dc.w                $A800
  1069.         EndM
  1070.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1071.         IMPORT_CFM_FUNCTION SndPlayDoubleBuffer
  1072.     ENDIF
  1073.  
  1074. ;  MACE compression routines, uses _SoundDispatch 
  1075. ;
  1076. ; pascal NumVersion MACEVersion(void )
  1077. ;
  1078.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1079.         Macro
  1080.         _MACEVersion
  1081.             move.l              #$00000010,D0
  1082.             dc.w                $A800
  1083.         EndM
  1084.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1085.         IMPORT_CFM_FUNCTION MACEVersion
  1086.     ENDIF
  1087.  
  1088. ;
  1089. ; pascal void Comp3to1(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1090. ;
  1091.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1092.         Macro
  1093.         _Comp3to1
  1094.             move.l              #$00040010,D0
  1095.             dc.w                $A800
  1096.         EndM
  1097.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1098.         IMPORT_CFM_FUNCTION Comp3to1
  1099.     ENDIF
  1100.  
  1101. ;
  1102. ; pascal void Exp1to3(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1103. ;
  1104.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1105.         Macro
  1106.         _Exp1to3
  1107.             move.l              #$00080010,D0
  1108.             dc.w                $A800
  1109.         EndM
  1110.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1111.         IMPORT_CFM_FUNCTION Exp1to3
  1112.     ENDIF
  1113.  
  1114. ;
  1115. ; pascal void Comp6to1(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1116. ;
  1117.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1118.         Macro
  1119.         _Comp6to1
  1120.             move.l              #$000C0010,D0
  1121.             dc.w                $A800
  1122.         EndM
  1123.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1124.         IMPORT_CFM_FUNCTION Comp6to1
  1125.     ENDIF
  1126.  
  1127. ;
  1128. ; pascal void Exp1to6(const void *inBuffer, void *outBuffer, unsigned long cnt, StateBlockPtr inState, StateBlockPtr outState, unsigned long numChannels, unsigned long whichChannel)
  1129. ;
  1130.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1131.         Macro
  1132.         _Exp1to6
  1133.             move.l              #$00100010,D0
  1134.             dc.w                $A800
  1135.         EndM
  1136.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1137.         IMPORT_CFM_FUNCTION Exp1to6
  1138.     ENDIF
  1139.  
  1140. ;  Sound Manager 3.0 and later calls, uses _SoundDispatch 
  1141. ;
  1142. ; pascal OSErr GetSysBeepVolume(long *level)
  1143. ;
  1144.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1145.         Macro
  1146.         _GetSysBeepVolume
  1147.             move.l              #$02240018,D0
  1148.             dc.w                $A800
  1149.         EndM
  1150.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1151.         IMPORT_CFM_FUNCTION GetSysBeepVolume
  1152.     ENDIF
  1153.  
  1154. ;
  1155. ; pascal OSErr SetSysBeepVolume(long level)
  1156. ;
  1157.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1158.         Macro
  1159.         _SetSysBeepVolume
  1160.             move.l              #$02280018,D0
  1161.             dc.w                $A800
  1162.         EndM
  1163.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1164.         IMPORT_CFM_FUNCTION SetSysBeepVolume
  1165.     ENDIF
  1166.  
  1167. ;
  1168. ; pascal OSErr GetDefaultOutputVolume(long *level)
  1169. ;
  1170.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1171.         Macro
  1172.         _GetDefaultOutputVolume
  1173.             move.l              #$022C0018,D0
  1174.             dc.w                $A800
  1175.         EndM
  1176.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1177.         IMPORT_CFM_FUNCTION GetDefaultOutputVolume
  1178.     ENDIF
  1179.  
  1180. ;
  1181. ; pascal OSErr SetDefaultOutputVolume(long level)
  1182. ;
  1183.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1184.         Macro
  1185.         _SetDefaultOutputVolume
  1186.             move.l              #$02300018,D0
  1187.             dc.w                $A800
  1188.         EndM
  1189.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1190.         IMPORT_CFM_FUNCTION SetDefaultOutputVolume
  1191.     ENDIF
  1192.  
  1193. ;
  1194. ; pascal OSErr GetSoundHeaderOffset(SndListHandle sndHandle, long *offset)
  1195. ;
  1196.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1197.         Macro
  1198.         _GetSoundHeaderOffset
  1199.             move.l              #$04040018,D0
  1200.             dc.w                $A800
  1201.         EndM
  1202.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1203.         IMPORT_CFM_FUNCTION GetSoundHeaderOffset
  1204.     ENDIF
  1205.  
  1206. ;
  1207. ; pascal UnsignedFixed UnsignedFixedMulDiv(UnsignedFixed value, UnsignedFixed multiplier, UnsignedFixed divisor)
  1208. ;
  1209.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1210.         Macro
  1211.         _UnsignedFixedMulDiv
  1212.             move.l              #$060C0018,D0
  1213.             dc.w                $A800
  1214.         EndM
  1215.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1216.         IMPORT_CFM_FUNCTION UnsignedFixedMulDiv
  1217.     ENDIF
  1218.  
  1219. ;
  1220. ; pascal OSErr GetCompressionInfo(short compressionID, OSType format, short numChannels, short sampleSize, CompressionInfoPtr cp)
  1221. ;
  1222.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1223.         Macro
  1224.         _GetCompressionInfo
  1225.             move.l              #$07100018,D0
  1226.             dc.w                $A800
  1227.         EndM
  1228.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1229.         IMPORT_CFM_FUNCTION GetCompressionInfo
  1230.     ENDIF
  1231.  
  1232. ;
  1233. ; pascal OSErr SetSoundPreference(OSType theType, Str255 name, Handle settings)
  1234. ;
  1235.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1236.         Macro
  1237.         _SetSoundPreference
  1238.             move.l              #$06340018,D0
  1239.             dc.w                $A800
  1240.         EndM
  1241.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1242.         IMPORT_CFM_FUNCTION SetSoundPreference
  1243.     ENDIF
  1244.  
  1245. ;
  1246. ; pascal OSErr GetSoundPreference(OSType theType, Str255 name, Handle settings)
  1247. ;
  1248.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1249.         Macro
  1250.         _GetSoundPreference
  1251.             move.l              #$06380018,D0
  1252.             dc.w                $A800
  1253.         EndM
  1254.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1255.         IMPORT_CFM_FUNCTION GetSoundPreference
  1256.     ENDIF
  1257.  
  1258. ;
  1259. ; pascal OSErr OpenMixerSoundComponent(SoundComponentDataPtr outputDescription, long outputFlags, ComponentInstance *mixerComponent)
  1260. ;
  1261.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1262.         Macro
  1263.         _OpenMixerSoundComponent
  1264.             move.l              #$06140018,D0
  1265.             dc.w                $A800
  1266.         EndM
  1267.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1268.         IMPORT_CFM_FUNCTION OpenMixerSoundComponent
  1269.     ENDIF
  1270.  
  1271. ;
  1272. ; pascal OSErr CloseMixerSoundComponent(ComponentInstance ci)
  1273. ;
  1274.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1275.         Macro
  1276.         _CloseMixerSoundComponent
  1277.             move.l              #$02180018,D0
  1278.             dc.w                $A800
  1279.         EndM
  1280.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1281.         IMPORT_CFM_FUNCTION CloseMixerSoundComponent
  1282.     ENDIF
  1283.  
  1284. ;  Sound Manager 3.1 and later calls, uses _SoundDispatch 
  1285. ;
  1286. ; pascal OSErr SndGetInfo(SndChannelPtr chan, OSType selector, void *infoPtr)
  1287. ;
  1288.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1289.         Macro
  1290.         _SndGetInfo
  1291.             move.l              #$063C0018,D0
  1292.             dc.w                $A800
  1293.         EndM
  1294.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1295.         IMPORT_CFM_FUNCTION SndGetInfo
  1296.     ENDIF
  1297.  
  1298. ;
  1299. ; pascal OSErr SndSetInfo(SndChannelPtr chan, OSType selector, const void *infoPtr)
  1300. ;
  1301.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1302.         Macro
  1303.         _SndSetInfo
  1304.             move.l              #$06400018,D0
  1305.             dc.w                $A800
  1306.         EndM
  1307.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1308.         IMPORT_CFM_FUNCTION SndSetInfo
  1309.     ENDIF
  1310.  
  1311. ;
  1312. ; pascal OSErr GetSoundOutputInfo(Component outputDevice, OSType selector, void *infoPtr)
  1313. ;
  1314.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1315.         Macro
  1316.         _GetSoundOutputInfo
  1317.             move.l              #$06440018,D0
  1318.             dc.w                $A800
  1319.         EndM
  1320.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1321.         IMPORT_CFM_FUNCTION GetSoundOutputInfo
  1322.     ENDIF
  1323.  
  1324. ;
  1325. ; pascal OSErr SetSoundOutputInfo(Component outputDevice, OSType selector, const void *infoPtr)
  1326. ;
  1327.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1328.         Macro
  1329.         _SetSoundOutputInfo
  1330.             move.l              #$06480018,D0
  1331.             dc.w                $A800
  1332.         EndM
  1333.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1334.         IMPORT_CFM_FUNCTION SetSoundOutputInfo
  1335.     ENDIF
  1336.  
  1337. ;  Sound Manager 3.2 and later calls, uses _SoundDispatch 
  1338. ;
  1339. ; pascal OSErr GetCompressionName(OSType compressionType, Str255 compressionName)
  1340. ;
  1341.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1342.         Macro
  1343.         _GetCompressionName
  1344.             move.l              #$044C0018,D0
  1345.             dc.w                $A800
  1346.         EndM
  1347.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1348.         IMPORT_CFM_FUNCTION GetCompressionName
  1349.     ENDIF
  1350.  
  1351. ;
  1352. ; pascal OSErr SoundConverterOpen(const SoundComponentData *inputFormat, const SoundComponentData *outputFormat, SoundConverter *sc)
  1353. ;
  1354.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1355.         Macro
  1356.         _SoundConverterOpen
  1357.             move.l              #$06500018,D0
  1358.             dc.w                $A800
  1359.         EndM
  1360.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1361.         IMPORT_CFM_FUNCTION SoundConverterOpen
  1362.     ENDIF
  1363.  
  1364. ;
  1365. ; pascal OSErr SoundConverterClose(SoundConverter sc)
  1366. ;
  1367.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1368.         Macro
  1369.         _SoundConverterClose
  1370.             move.l              #$02540018,D0
  1371.             dc.w                $A800
  1372.         EndM
  1373.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1374.         IMPORT_CFM_FUNCTION SoundConverterClose
  1375.     ENDIF
  1376.  
  1377. ;
  1378. ; pascal OSErr SoundConverterGetBufferSizes(SoundConverter sc, unsigned long inputBytesTarget, unsigned long *inputFrames, unsigned long *inputBytes, unsigned long *outputBytes)
  1379. ;
  1380.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1381.         Macro
  1382.         _SoundConverterGetBufferSizes
  1383.             move.l              #$0A580018,D0
  1384.             dc.w                $A800
  1385.         EndM
  1386.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1387.         IMPORT_CFM_FUNCTION SoundConverterGetBufferSizes
  1388.     ENDIF
  1389.  
  1390. ;
  1391. ; pascal OSErr SoundConverterBeginConversion(SoundConverter sc)
  1392. ;
  1393.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1394.         Macro
  1395.         _SoundConverterBeginConversion
  1396.             move.l              #$025C0018,D0
  1397.             dc.w                $A800
  1398.         EndM
  1399.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1400.         IMPORT_CFM_FUNCTION SoundConverterBeginConversion
  1401.     ENDIF
  1402.  
  1403. ;
  1404. ; pascal OSErr SoundConverterConvertBuffer(SoundConverter sc, const void *inputPtr, unsigned long inputFrames, void *outputPtr, unsigned long *outputFrames, unsigned long *outputBytes)
  1405. ;
  1406.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1407.         Macro
  1408.         _SoundConverterConvertBuffer
  1409.             move.l              #$0C600018,D0
  1410.             dc.w                $A800
  1411.         EndM
  1412.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1413.         IMPORT_CFM_FUNCTION SoundConverterConvertBuffer
  1414.     ENDIF
  1415.  
  1416. ;
  1417. ; pascal OSErr SoundConverterEndConversion(SoundConverter sc, void *outputPtr, unsigned long *outputFrames, unsigned long *outputBytes)
  1418. ;
  1419.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1420.         Macro
  1421.         _SoundConverterEndConversion
  1422.             move.l              #$08640018,D0
  1423.             dc.w                $A800
  1424.         EndM
  1425.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1426.         IMPORT_CFM_FUNCTION SoundConverterEndConversion
  1427.     ENDIF
  1428.  
  1429. ;  Sound Manager 3.3 and later calls, uses _SoundDispatch 
  1430. ;
  1431. ; pascal OSErr SoundConverterGetInfo(SoundConverter sc, OSType selector, void *infoPtr)
  1432. ;
  1433.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1434.         Macro
  1435.         _SoundConverterGetInfo
  1436.             move.l              #$06680018,D0
  1437.             dc.w                $A800
  1438.         EndM
  1439.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1440.         IMPORT_CFM_FUNCTION SoundConverterGetInfo
  1441.     ENDIF
  1442.  
  1443. ;
  1444. ; pascal OSErr SoundConverterSetInfo(SoundConverter sc, OSType selector, void *infoPtr)
  1445. ;
  1446.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1447.         Macro
  1448.         _SoundConverterSetInfo
  1449.             move.l              #$066C0018,D0
  1450.             dc.w                $A800
  1451.         EndM
  1452.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1453.         IMPORT_CFM_FUNCTION SoundConverterSetInfo
  1454.     ENDIF
  1455.  
  1456.  
  1457. ;  Sound Component Functions
  1458. ;   basic sound component functions
  1459.  
  1460.  
  1461.  
  1462. ;
  1463. ; pascal ComponentResult SoundComponentInitOutputDevice(ComponentInstance ti, long actions)
  1464. ;
  1465.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1466.         Macro
  1467.         _SoundComponentInitOutputDevice
  1468.             move.l              #$00040001,-(sp)
  1469.             moveq               #0,D0
  1470.             dc.w                $A82A
  1471.         EndM
  1472.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1473.         IMPORT_CFM_FUNCTION SoundComponentInitOutputDevice
  1474.     ENDIF
  1475.  
  1476. ;
  1477. ; pascal ComponentResult SoundComponentSetSource(ComponentInstance ti, SoundSource sourceID, ComponentInstance source)
  1478. ;
  1479.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1480.         Macro
  1481.         _SoundComponentSetSource
  1482.             move.l              #$00080002,-(sp)
  1483.             moveq               #0,D0
  1484.             dc.w                $A82A
  1485.         EndM
  1486.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1487.         IMPORT_CFM_FUNCTION SoundComponentSetSource
  1488.     ENDIF
  1489.  
  1490. ;
  1491. ; pascal ComponentResult SoundComponentGetSource(ComponentInstance ti, SoundSource sourceID, ComponentInstance *source)
  1492. ;
  1493.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1494.         Macro
  1495.         _SoundComponentGetSource
  1496.             move.l              #$00080003,-(sp)
  1497.             moveq               #0,D0
  1498.             dc.w                $A82A
  1499.         EndM
  1500.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1501.         IMPORT_CFM_FUNCTION SoundComponentGetSource
  1502.     ENDIF
  1503.  
  1504. ;
  1505. ; pascal ComponentResult SoundComponentGetSourceData(ComponentInstance ti, SoundComponentDataPtr *sourceData)
  1506. ;
  1507.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1508.         Macro
  1509.         _SoundComponentGetSourceData
  1510.             move.l              #$00040004,-(sp)
  1511.             moveq               #0,D0
  1512.             dc.w                $A82A
  1513.         EndM
  1514.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1515.         IMPORT_CFM_FUNCTION SoundComponentGetSourceData
  1516.     ENDIF
  1517.  
  1518. ;
  1519. ; pascal ComponentResult SoundComponentSetOutput(ComponentInstance ti, SoundComponentDataPtr requested, SoundComponentDataPtr *actual)
  1520. ;
  1521.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1522.         Macro
  1523.         _SoundComponentSetOutput
  1524.             move.l              #$00080005,-(sp)
  1525.             moveq               #0,D0
  1526.             dc.w                $A82A
  1527.         EndM
  1528.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1529.         IMPORT_CFM_FUNCTION SoundComponentSetOutput
  1530.     ENDIF
  1531.  
  1532. ;  junction methods for the mixer, must be called at non-interrupt level
  1533. ;
  1534. ; pascal ComponentResult SoundComponentAddSource(ComponentInstance ti, SoundSource *sourceID)
  1535. ;
  1536.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1537.         Macro
  1538.         _SoundComponentAddSource
  1539.             move.l              #$00040101,-(sp)
  1540.             moveq               #0,D0
  1541.             dc.w                $A82A
  1542.         EndM
  1543.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1544.         IMPORT_CFM_FUNCTION SoundComponentAddSource
  1545.     ENDIF
  1546.  
  1547. ;
  1548. ; pascal ComponentResult SoundComponentRemoveSource(ComponentInstance ti, SoundSource sourceID)
  1549. ;
  1550.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1551.         Macro
  1552.         _SoundComponentRemoveSource
  1553.             move.l              #$00040102,-(sp)
  1554.             moveq               #0,D0
  1555.             dc.w                $A82A
  1556.         EndM
  1557.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1558.         IMPORT_CFM_FUNCTION SoundComponentRemoveSource
  1559.     ENDIF
  1560.  
  1561. ;  info methods
  1562. ;
  1563. ; pascal ComponentResult SoundComponentGetInfo(ComponentInstance ti, SoundSource sourceID, OSType selector, void *infoPtr)
  1564. ;
  1565.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1566.         Macro
  1567.         _SoundComponentGetInfo
  1568.             move.l              #$000C0103,-(sp)
  1569.             moveq               #0,D0
  1570.             dc.w                $A82A
  1571.         EndM
  1572.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1573.         IMPORT_CFM_FUNCTION SoundComponentGetInfo
  1574.     ENDIF
  1575.  
  1576. ;
  1577. ; pascal ComponentResult SoundComponentSetInfo(ComponentInstance ti, SoundSource sourceID, OSType selector, void *infoPtr)
  1578. ;
  1579.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1580.         Macro
  1581.         _SoundComponentSetInfo
  1582.             move.l              #$000C0104,-(sp)
  1583.             moveq               #0,D0
  1584.             dc.w                $A82A
  1585.         EndM
  1586.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1587.         IMPORT_CFM_FUNCTION SoundComponentSetInfo
  1588.     ENDIF
  1589.  
  1590. ;  control methods
  1591. ;
  1592. ; pascal ComponentResult SoundComponentStartSource(ComponentInstance ti, short count, SoundSource *sources)
  1593. ;
  1594.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1595.         Macro
  1596.         _SoundComponentStartSource
  1597.             move.l              #$00060105,-(sp)
  1598.             moveq               #0,D0
  1599.             dc.w                $A82A
  1600.         EndM
  1601.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1602.         IMPORT_CFM_FUNCTION SoundComponentStartSource
  1603.     ENDIF
  1604.  
  1605. ;
  1606. ; pascal ComponentResult SoundComponentStopSource(ComponentInstance ti, short count, SoundSource *sources)
  1607. ;
  1608.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1609.         Macro
  1610.         _SoundComponentStopSource
  1611.             move.l              #$00060106,-(sp)
  1612.             moveq               #0,D0
  1613.             dc.w                $A82A
  1614.         EndM
  1615.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1616.         IMPORT_CFM_FUNCTION SoundComponentStopSource
  1617.     ENDIF
  1618.  
  1619. ;
  1620. ; pascal ComponentResult SoundComponentPauseSource(ComponentInstance ti, short count, SoundSource *sources)
  1621. ;
  1622.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1623.         Macro
  1624.         _SoundComponentPauseSource
  1625.             move.l              #$00060107,-(sp)
  1626.             moveq               #0,D0
  1627.             dc.w                $A82A
  1628.         EndM
  1629.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1630.         IMPORT_CFM_FUNCTION SoundComponentPauseSource
  1631.     ENDIF
  1632.  
  1633. ;
  1634. ; pascal ComponentResult SoundComponentPlaySourceBuffer(ComponentInstance ti, SoundSource sourceID, SoundParamBlockPtr pb, long actions)
  1635. ;
  1636.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1637.         Macro
  1638.         _SoundComponentPlaySourceBuffer
  1639.             move.l              #$000C0108,-(sp)
  1640.             moveq               #0,D0
  1641.             dc.w                $A82A
  1642.         EndM
  1643.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1644.         IMPORT_CFM_FUNCTION SoundComponentPlaySourceBuffer
  1645.     ENDIF
  1646.  
  1647. ; Audio Components
  1648. ; Volume is described as a value between 0 and 1, with 0 indicating minimum
  1649. ;  volume and 1 indicating maximum volume; if the device doesn't support
  1650. ;  software control of volume, then a value of unimpErr is returned, indicating
  1651. ;  that these functions are not supported by the device
  1652.  
  1653. ;
  1654. ; pascal ComponentResult AudioGetVolume(ComponentInstance ac, short whichChannel, ShortFixed *volume)
  1655. ;
  1656.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1657.         Macro
  1658.         _AudioGetVolume
  1659.             move.l              #$00060000,-(sp)
  1660.             moveq               #0,D0
  1661.             dc.w                $A82A
  1662.         EndM
  1663.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1664.         IMPORT_CFM_FUNCTION AudioGetVolume
  1665.     ENDIF
  1666.  
  1667. ;
  1668. ; pascal ComponentResult AudioSetVolume(ComponentInstance ac, short whichChannel, ShortFixed volume)
  1669. ;
  1670.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1671.         Macro
  1672.         _AudioSetVolume
  1673.             move.l              #$00040001,-(sp)
  1674.             moveq               #0,D0
  1675.             dc.w                $A82A
  1676.         EndM
  1677.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1678.         IMPORT_CFM_FUNCTION AudioSetVolume
  1679.     ENDIF
  1680.  
  1681. ; If the device doesn't support software control of mute, then a value of unimpErr is
  1682. ;returned, indicating that these functions are not supported by the device.
  1683. ;
  1684. ; pascal ComponentResult AudioGetMute(ComponentInstance ac, short whichChannel, short *mute)
  1685. ;
  1686.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1687.         Macro
  1688.         _AudioGetMute
  1689.             move.l              #$00060002,-(sp)
  1690.             moveq               #0,D0
  1691.             dc.w                $A82A
  1692.         EndM
  1693.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1694.         IMPORT_CFM_FUNCTION AudioGetMute
  1695.     ENDIF
  1696.  
  1697. ;
  1698. ; pascal ComponentResult AudioSetMute(ComponentInstance ac, short whichChannel, short mute)
  1699. ;
  1700.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1701.         Macro
  1702.         _AudioSetMute
  1703.             move.l              #$00040003,-(sp)
  1704.             moveq               #0,D0
  1705.             dc.w                $A82A
  1706.         EndM
  1707.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1708.         IMPORT_CFM_FUNCTION AudioSetMute
  1709.     ENDIF
  1710.  
  1711. ; AudioSetToDefaults causes the associated device to reset its volume and mute values
  1712. ;(and perhaps other characteristics, e.g. attenuation) to "factory default" settings
  1713. ;
  1714. ; pascal ComponentResult AudioSetToDefaults(ComponentInstance ac)
  1715. ;
  1716.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1717.         Macro
  1718.         _AudioSetToDefaults
  1719.             move.l              #$00000004,-(sp)
  1720.             moveq               #0,D0
  1721.             dc.w                $A82A
  1722.         EndM
  1723.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1724.         IMPORT_CFM_FUNCTION AudioSetToDefaults
  1725.     ENDIF
  1726.  
  1727. ; This routine is required; it must be implemented by all audio components
  1728.  
  1729. ;
  1730. ; pascal ComponentResult AudioGetInfo(ComponentInstance ac, AudioInfoPtr info)
  1731. ;
  1732.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1733.         Macro
  1734.         _AudioGetInfo
  1735.             move.l              #$00040005,-(sp)
  1736.             moveq               #0,D0
  1737.             dc.w                $A82A
  1738.         EndM
  1739.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1740.         IMPORT_CFM_FUNCTION AudioGetInfo
  1741.     ENDIF
  1742.  
  1743. ;
  1744. ; pascal ComponentResult AudioGetBass(ComponentInstance ac, short whichChannel, short *bass)
  1745. ;
  1746.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1747.         Macro
  1748.         _AudioGetBass
  1749.             move.l              #$00060006,-(sp)
  1750.             moveq               #0,D0
  1751.             dc.w                $A82A
  1752.         EndM
  1753.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1754.         IMPORT_CFM_FUNCTION AudioGetBass
  1755.     ENDIF
  1756.  
  1757. ;
  1758. ; pascal ComponentResult AudioSetBass(ComponentInstance ac, short whichChannel, short bass)
  1759. ;
  1760.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1761.         Macro
  1762.         _AudioSetBass
  1763.             move.l              #$00040007,-(sp)
  1764.             moveq               #0,D0
  1765.             dc.w                $A82A
  1766.         EndM
  1767.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1768.         IMPORT_CFM_FUNCTION AudioSetBass
  1769.     ENDIF
  1770.  
  1771. ;
  1772. ; pascal ComponentResult AudioGetTreble(ComponentInstance ac, short whichChannel, short *Treble)
  1773. ;
  1774.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1775.         Macro
  1776.         _AudioGetTreble
  1777.             move.l              #$00060008,-(sp)
  1778.             moveq               #0,D0
  1779.             dc.w                $A82A
  1780.         EndM
  1781.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1782.         IMPORT_CFM_FUNCTION AudioGetTreble
  1783.     ENDIF
  1784.  
  1785. ;
  1786. ; pascal ComponentResult AudioSetTreble(ComponentInstance ac, short whichChannel, short Treble)
  1787. ;
  1788.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1789.         Macro
  1790.         _AudioSetTreble
  1791.             move.l              #$00040009,-(sp)
  1792.             moveq               #0,D0
  1793.             dc.w                $A82A
  1794.         EndM
  1795.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1796.         IMPORT_CFM_FUNCTION AudioSetTreble
  1797.     ENDIF
  1798.  
  1799. ;
  1800. ; pascal ComponentResult AudioGetOutputDevice(ComponentInstance ac, Component *outputDevice)
  1801. ;
  1802.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1803.         Macro
  1804.         _AudioGetOutputDevice
  1805.             move.l              #$0004000A,-(sp)
  1806.             moveq               #0,D0
  1807.             dc.w                $A82A
  1808.         EndM
  1809.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1810.         IMPORT_CFM_FUNCTION AudioGetOutputDevice
  1811.     ENDIF
  1812.  
  1813.  
  1814. ; This is routine is private to the AudioVision component.  It enables the watching of the mute key.
  1815. ;
  1816. ; pascal ComponentResult AudioMuteOnEvent(ComponentInstance ac, short muteOnEvent)
  1817. ;
  1818.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1819.         Macro
  1820.         _AudioMuteOnEvent
  1821.             move.l              #$00020081,-(sp)
  1822.             moveq               #0,D0
  1823.             dc.w                $A82A
  1824.         EndM
  1825.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1826.         IMPORT_CFM_FUNCTION AudioMuteOnEvent
  1827.     ENDIF
  1828.  
  1829.  
  1830. kDelegatedSoundComponentSelectors EQU    $0100
  1831. ;  Sound Input Manager routines, uses _SoundDispatch 
  1832. ;
  1833. ; pascal NumVersion SPBVersion(void )
  1834. ;
  1835.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1836.         Macro
  1837.         _SPBVersion
  1838.             move.l              #$00000014,D0
  1839.             dc.w                $A800
  1840.         EndM
  1841.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1842.         IMPORT_CFM_FUNCTION SPBVersion
  1843.     ENDIF
  1844.  
  1845. ;
  1846. ; pascal OSErr SndRecord(ModalFilterUPP filterProc, Point corner, OSType quality, SndListHandle *sndHandle)
  1847. ;
  1848.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1849.         Macro
  1850.         _SndRecord
  1851.             move.l              #$08040014,D0
  1852.             dc.w                $A800
  1853.         EndM
  1854.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1855.         IMPORT_CFM_FUNCTION SndRecord
  1856.     ENDIF
  1857.  
  1858. ;
  1859. ; pascal OSErr SndRecordToFile(ModalFilterUPP filterProc, Point corner, OSType quality, short fRefNum)
  1860. ;
  1861.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1862.         Macro
  1863.         _SndRecordToFile
  1864.             move.l              #$07080014,D0
  1865.             dc.w                $A800
  1866.         EndM
  1867.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1868.         IMPORT_CFM_FUNCTION SndRecordToFile
  1869.     ENDIF
  1870.  
  1871. ;
  1872. ; pascal OSErr SPBSignInDevice(short deviceRefNum, ConstStr255Param deviceName)
  1873. ;
  1874.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1875.         Macro
  1876.         _SPBSignInDevice
  1877.             move.l              #$030C0014,D0
  1878.             dc.w                $A800
  1879.         EndM
  1880.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1881.         IMPORT_CFM_FUNCTION SPBSignInDevice
  1882.     ENDIF
  1883.  
  1884. ;
  1885. ; pascal OSErr SPBSignOutDevice(short deviceRefNum)
  1886. ;
  1887.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1888.         Macro
  1889.         _SPBSignOutDevice
  1890.             move.l              #$01100014,D0
  1891.             dc.w                $A800
  1892.         EndM
  1893.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1894.         IMPORT_CFM_FUNCTION SPBSignOutDevice
  1895.     ENDIF
  1896.  
  1897. ;
  1898. ; pascal OSErr SPBGetIndexedDevice(short count, Str255 deviceName, Handle *deviceIconHandle)
  1899. ;
  1900.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1901.         Macro
  1902.         _SPBGetIndexedDevice
  1903.             move.l              #$05140014,D0
  1904.             dc.w                $A800
  1905.         EndM
  1906.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1907.         IMPORT_CFM_FUNCTION SPBGetIndexedDevice
  1908.     ENDIF
  1909.  
  1910. ;
  1911. ; pascal OSErr SPBOpenDevice(ConstStr255Param deviceName, short permission, long *inRefNum)
  1912. ;
  1913.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1914.         Macro
  1915.         _SPBOpenDevice
  1916.             move.l              #$05180014,D0
  1917.             dc.w                $A800
  1918.         EndM
  1919.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1920.         IMPORT_CFM_FUNCTION SPBOpenDevice
  1921.     ENDIF
  1922.  
  1923. ;
  1924. ; pascal OSErr SPBCloseDevice(long inRefNum)
  1925. ;
  1926.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1927.         Macro
  1928.         _SPBCloseDevice
  1929.             move.l              #$021C0014,D0
  1930.             dc.w                $A800
  1931.         EndM
  1932.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1933.         IMPORT_CFM_FUNCTION SPBCloseDevice
  1934.     ENDIF
  1935.  
  1936. ;
  1937. ; pascal OSErr SPBRecord(SPBPtr inParamPtr, Boolean asynchFlag)
  1938. ;
  1939.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1940.         Macro
  1941.         _SPBRecord
  1942.             move.l              #$03200014,D0
  1943.             dc.w                $A800
  1944.         EndM
  1945.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1946.         IMPORT_CFM_FUNCTION SPBRecord
  1947.     ENDIF
  1948.  
  1949. ;
  1950. ; pascal OSErr SPBRecordToFile(short fRefNum, SPBPtr inParamPtr, Boolean asynchFlag)
  1951. ;
  1952.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1953.         Macro
  1954.         _SPBRecordToFile
  1955.             move.l              #$04240014,D0
  1956.             dc.w                $A800
  1957.         EndM
  1958.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1959.         IMPORT_CFM_FUNCTION SPBRecordToFile
  1960.     ENDIF
  1961.  
  1962. ;
  1963. ; pascal OSErr SPBPauseRecording(long inRefNum)
  1964. ;
  1965.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1966.         Macro
  1967.         _SPBPauseRecording
  1968.             move.l              #$02280014,D0
  1969.             dc.w                $A800
  1970.         EndM
  1971.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1972.         IMPORT_CFM_FUNCTION SPBPauseRecording
  1973.     ENDIF
  1974.  
  1975. ;
  1976. ; pascal OSErr SPBResumeRecording(long inRefNum)
  1977. ;
  1978.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1979.         Macro
  1980.         _SPBResumeRecording
  1981.             move.l              #$022C0014,D0
  1982.             dc.w                $A800
  1983.         EndM
  1984.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1985.         IMPORT_CFM_FUNCTION SPBResumeRecording
  1986.     ENDIF
  1987.  
  1988. ;
  1989. ; pascal OSErr SPBStopRecording(long inRefNum)
  1990. ;
  1991.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  1992.         Macro
  1993.         _SPBStopRecording
  1994.             move.l              #$02300014,D0
  1995.             dc.w                $A800
  1996.         EndM
  1997.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  1998.         IMPORT_CFM_FUNCTION SPBStopRecording
  1999.     ENDIF
  2000.  
  2001. ;
  2002. ; pascal OSErr SPBGetRecordingStatus(long inRefNum, short *recordingStatus, short *meterLevel, unsigned long *totalSamplesToRecord, unsigned long *numberOfSamplesRecorded, unsigned long *totalMsecsToRecord, unsigned long *numberOfMsecsRecorded)
  2003. ;
  2004.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2005.         Macro
  2006.         _SPBGetRecordingStatus
  2007.             move.l              #$0E340014,D0
  2008.             dc.w                $A800
  2009.         EndM
  2010.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2011.         IMPORT_CFM_FUNCTION SPBGetRecordingStatus
  2012.     ENDIF
  2013.  
  2014. ;
  2015. ; pascal OSErr SPBGetDeviceInfo(long inRefNum, OSType infoType, void *infoData)
  2016. ;
  2017.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2018.         Macro
  2019.         _SPBGetDeviceInfo
  2020.             move.l              #$06380014,D0
  2021.             dc.w                $A800
  2022.         EndM
  2023.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2024.         IMPORT_CFM_FUNCTION SPBGetDeviceInfo
  2025.     ENDIF
  2026.  
  2027. ;
  2028. ; pascal OSErr SPBSetDeviceInfo(long inRefNum, OSType infoType, void *infoData)
  2029. ;
  2030.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2031.         Macro
  2032.         _SPBSetDeviceInfo
  2033.             move.l              #$063C0014,D0
  2034.             dc.w                $A800
  2035.         EndM
  2036.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2037.         IMPORT_CFM_FUNCTION SPBSetDeviceInfo
  2038.     ENDIF
  2039.  
  2040. ;
  2041. ; pascal OSErr SPBMillisecondsToBytes(long inRefNum, long *milliseconds)
  2042. ;
  2043.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2044.         Macro
  2045.         _SPBMillisecondsToBytes
  2046.             move.l              #$04400014,D0
  2047.             dc.w                $A800
  2048.         EndM
  2049.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2050.         IMPORT_CFM_FUNCTION SPBMillisecondsToBytes
  2051.     ENDIF
  2052.  
  2053. ;
  2054. ; pascal OSErr SPBBytesToMilliseconds(long inRefNum, long *byteCount)
  2055. ;
  2056.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2057.         Macro
  2058.         _SPBBytesToMilliseconds
  2059.             move.l              #$04440014,D0
  2060.             dc.w                $A800
  2061.         EndM
  2062.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2063.         IMPORT_CFM_FUNCTION SPBBytesToMilliseconds
  2064.     ENDIF
  2065.  
  2066. ;
  2067. ; pascal OSErr SetupSndHeader(SndListHandle sndHandle, short numChannels, UnsignedFixed sampleRate, short sampleSize, OSType compressionType, short baseNote, unsigned long numBytes, short *headerLen)
  2068. ;
  2069.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2070.         Macro
  2071.         _SetupSndHeader
  2072.             move.l              #$0D480014,D0
  2073.             dc.w                $A800
  2074.         EndM
  2075.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2076.         IMPORT_CFM_FUNCTION SetupSndHeader
  2077.     ENDIF
  2078.  
  2079. ;
  2080. ; pascal OSErr SetupAIFFHeader(short fRefNum, short numChannels, UnsignedFixed sampleRate, short sampleSize, OSType compressionType, unsigned long numBytes, unsigned long numFrames)
  2081. ;
  2082.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2083.         Macro
  2084.         _SetupAIFFHeader
  2085.             move.l              #$0B4C0014,D0
  2086.             dc.w                $A800
  2087.         EndM
  2088.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2089.         IMPORT_CFM_FUNCTION SetupAIFFHeader
  2090.     ENDIF
  2091.  
  2092. ;  Sound Input Manager 1.1 and later calls, uses _SoundDispatch 
  2093. ;
  2094. ; pascal OSErr ParseAIFFHeader(short fRefNum, SoundComponentData *sndInfo, unsigned long *numFrames, unsigned long *dataOffset)
  2095. ;
  2096.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2097.         Macro
  2098.         _ParseAIFFHeader
  2099.             move.l              #$07580014,D0
  2100.             dc.w                $A800
  2101.         EndM
  2102.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2103.         IMPORT_CFM_FUNCTION ParseAIFFHeader
  2104.     ENDIF
  2105.  
  2106. ;
  2107. ; pascal OSErr ParseSndHeader(SndListHandle sndHandle, SoundComponentData *sndInfo, unsigned long *numFrames, unsigned long *dataOffset)
  2108. ;
  2109.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2110.         Macro
  2111.         _ParseSndHeader
  2112.             move.l              #$085C0014,D0
  2113.             dc.w                $A800
  2114.         EndM
  2115.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2116.         IMPORT_CFM_FUNCTION ParseSndHeader
  2117.     ENDIF
  2118.  
  2119.     IF ¬ TARGET_OS_MAC THEN
  2120. ;   Only to be used if you are writing a sound input component; this 
  2121. ;   is the param block for a read request from the SoundMgr to the   
  2122. ;   sound input component.  Not to be confused with the SPB struct   
  2123. ;   above, which is the param block for a read request from an app   
  2124. ;   to the SoundMgr.                                                 
  2125.  
  2126.  
  2127. ; typedef SndInputCmpParam *            SndInputCmpParamPtr
  2128.  
  2129. SndInputCmpParam        RECORD 0
  2130. ioCompletion             ds.l    1                ; offset: $0 (0)        ;  completion routine [pointer]
  2131. ioInterrupt                 ds.l    1                ; offset: $4 (4)        ;  interrupt routine [pointer]
  2132. ioResult                 ds.w    1                ; offset: $8 (8)        ;  I/O result code [word]
  2133. pad                         ds.w    1                ; offset: $A (10)
  2134. ioReqCount                 ds.l    1                ; offset: $C (12)
  2135. ioActCount                 ds.l    1                ; offset: $10 (16)
  2136. ioBuffer                 ds.l    1                ; offset: $14 (20)
  2137. ioMisc                     ds.l    1                ; offset: $18 (24)
  2138. sizeof                     EQU *                    ; size:   $1C (28)
  2139.                         ENDR
  2140. ;
  2141. ; pascal ComponentResult SndInputReadAsync(ComponentInstance self, SndInputCmpParamPtr SICParmPtr)
  2142. ;
  2143.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2144.         Macro
  2145.         _SndInputReadAsync
  2146.             move.l              #$00040001,-(sp)
  2147.             moveq               #0,D0
  2148.             dc.w                $A82A
  2149.         EndM
  2150.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2151.         IMPORT_CFM_FUNCTION SndInputReadAsync
  2152.     ENDIF
  2153.  
  2154. ;
  2155. ; pascal ComponentResult SndInputReadSync(ComponentInstance self, SndInputCmpParamPtr SICParmPtr)
  2156. ;
  2157.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2158.         Macro
  2159.         _SndInputReadSync
  2160.             move.l              #$00040002,-(sp)
  2161.             moveq               #0,D0
  2162.             dc.w                $A82A
  2163.         EndM
  2164.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2165.         IMPORT_CFM_FUNCTION SndInputReadSync
  2166.     ENDIF
  2167.  
  2168. ;
  2169. ; pascal ComponentResult SndInputPauseRecording(ComponentInstance self)
  2170. ;
  2171.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2172.         Macro
  2173.         _SndInputPauseRecording
  2174.             move.l              #$00000003,-(sp)
  2175.             moveq               #0,D0
  2176.             dc.w                $A82A
  2177.         EndM
  2178.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2179.         IMPORT_CFM_FUNCTION SndInputPauseRecording
  2180.     ENDIF
  2181.  
  2182. ;
  2183. ; pascal ComponentResult SndInputResumeRecording(ComponentInstance self)
  2184. ;
  2185.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2186.         Macro
  2187.         _SndInputResumeRecording
  2188.             move.l              #$00000004,-(sp)
  2189.             moveq               #0,D0
  2190.             dc.w                $A82A
  2191.         EndM
  2192.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2193.         IMPORT_CFM_FUNCTION SndInputResumeRecording
  2194.     ENDIF
  2195.  
  2196. ;
  2197. ; pascal ComponentResult SndInputStopRecording(ComponentInstance self)
  2198. ;
  2199.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2200.         Macro
  2201.         _SndInputStopRecording
  2202.             move.l              #$00000005,-(sp)
  2203.             moveq               #0,D0
  2204.             dc.w                $A82A
  2205.         EndM
  2206.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2207.         IMPORT_CFM_FUNCTION SndInputStopRecording
  2208.     ENDIF
  2209.  
  2210. ;
  2211. ; pascal ComponentResult SndInputGetStatus(ComponentInstance self, short *recordingStatus, unsigned long *totalSamplesToRecord, unsigned long *numberOfSamplesRecorded)
  2212. ;
  2213.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2214.         Macro
  2215.         _SndInputGetStatus
  2216.             move.l              #$000C0006,-(sp)
  2217.             moveq               #0,D0
  2218.             dc.w                $A82A
  2219.         EndM
  2220.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2221.         IMPORT_CFM_FUNCTION SndInputGetStatus
  2222.     ENDIF
  2223.  
  2224. ;
  2225. ; pascal ComponentResult SndInputGetDeviceInfo(ComponentInstance self, OSType infoType, void *infoData)
  2226. ;
  2227.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2228.         Macro
  2229.         _SndInputGetDeviceInfo
  2230.             move.l              #$00080007,-(sp)
  2231.             moveq               #0,D0
  2232.             dc.w                $A82A
  2233.         EndM
  2234.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2235.         IMPORT_CFM_FUNCTION SndInputGetDeviceInfo
  2236.     ENDIF
  2237.  
  2238. ;
  2239. ; pascal ComponentResult SndInputSetDeviceInfo(ComponentInstance self, OSType infoType, void *infoData)
  2240. ;
  2241.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2242.         Macro
  2243.         _SndInputSetDeviceInfo
  2244.             move.l              #$00080008,-(sp)
  2245.             moveq               #0,D0
  2246.             dc.w                $A82A
  2247.         EndM
  2248.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2249.         IMPORT_CFM_FUNCTION SndInputSetDeviceInfo
  2250.     ENDIF
  2251.  
  2252. ;
  2253. ; pascal ComponentResult SndInputInitHardware(ComponentInstance self)
  2254. ;
  2255.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  2256.         Macro
  2257.         _SndInputInitHardware
  2258.             move.l              #$00000009,-(sp)
  2259.             moveq               #0,D0
  2260.             dc.w                $A82A
  2261.         EndM
  2262.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  2263.         IMPORT_CFM_FUNCTION SndInputInitHardware
  2264.     ENDIF
  2265.  
  2266.     ENDIF
  2267.  
  2268.     ENDIF ; __SOUND__ 
  2269.  
  2270.